﻿Public Class Ppricipal

    

    Private Sub Ppricipal_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub LocalidadToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SalirToolStripMenuItem1.Click
        Plocalidad.Show()
    End Sub

    Private Sub BusquedaToolStripMenuItem4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BusquedaToolStripMenuItem4.Click
        Pbusquedapersona.Show()
    End Sub

    Private Sub NuevoInmuebleToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NuevoInmuebleToolStripMenuItem.Click
        Pinmueble.Show()
    End Sub

    Private Sub BusquedaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BusquedaToolStripMenuItem.Click
        Pbusquedadeinmueble.Show()
    End Sub

    Private Sub NuevoContratoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NuevoContratoToolStripMenuItem.Click
        Pcontrato.Show()
    End Sub

    Private Sub SalirToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SalirToolStripMenuItem2.Click
        MsgBox("GRACIAS POR UTILIZAR LA APLICACION", MsgBoxStyle.DefaultButton1)
        Me.Close()
    End Sub

    Private Sub BusquedaToolStripMenuItem5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BusquedaToolStripMenuItem5.Click

    End Sub
End Class